home *** CD-ROM | disk | FTP | other *** search
/ ftp.cs.arizona.edu / ftp.cs.arizona.edu.tar / ftp.cs.arizona.edu / icon / newsgrp / group99a.txt / 000071_icon-group-sender _Wed Mar 31 09:26:05 1999.msg < prev    next >
Internet Message Format  |  2000-09-20  |  5KB
  1. Return-Path: <icon-group-sender>
  2. Received: (from root@localhost)
  3.     by baskerville.CS.Arizona.EDU (8.9.1a/8.9.1) id JAA09302
  4.     for icon-group-addresses; Wed, 31 Mar 1999 09:25:57 -0700 (MST)
  5. Message-Id: <199903311625.JAA09302@baskerville.CS.Arizona.EDU>
  6. Date: Tue, 30 Mar 1999 17:28:55 -0600
  7. From: Steve Graham <graham@cowboy.biomed.com>
  8. X-Accept-Language: en
  9. To: Alan Saichek <abs@reba.engr.sgi.com>,
  10.         Icon Mailing List <icon-group@optima.CS.Arizona.EDU>
  11. Subject: Re: [Fwd: Problem reading binary file]
  12. Errors-To: icon-group-errors@optima.CS.Arizona.EDU
  13. Status: RO
  14.  
  15. Alan,
  16.  
  17.    I tried it and that did the trick.  Thanks a lot.
  18.  
  19.  
  20. Steve Graham
  21.  
  22. ===
  23.  
  24. Alan Saichek wrote:
  25. > 
  26. > 
  27. >         Hi Steve,
  28. > 
  29. >                 I haven't tried this, but on the surface...
  30. > 
  31. >                 Ctrl-Z is end-of-file in DOS.
  32. > 
  33. >         Check out Chap 11 Input and Output (2nd edition)
  34. >         Text Files and Binary Files
  35. > 
  36. >         which mentions translated mode. Use "u" qualifier for
  37. >         untranslated mode.
  38. > 
  39. > > >   in  := open(args[1],"ru") | stop("Unable to open ",args[1])
  40. > > >   out := open(args[2],"wu") | stop("Unable to open ",args[2])
  41. > 
  42. >         Regards, Alan
  43. > 
  44. > >
  45. > > Hello again.
  46. > >
  47. > > Turns out that the problem with this was that the 7th character was an
  48. > > ASCII 26 (^Z) and Icon would not read any further than that.  I created
  49. > > a 2nd file with a ^Z in a different position and got a similar result.
  50. > > This is despite the fact that there were over 25,000 characters
  51. > > following the Control Z.
  52. > >
  53. > > So, my question is:  Why does Icon stop reading when it hits a ^Z?  I
  54. > > can kind of understand this if I were reading a text file; but I was
  55. > > specifically using reads() because this is a binary file?  Should not
  56. > > reads() support all 256 ASCII codes and only stop reading when there are
  57. > > REALLY no more characters to read?  I ended up using another language,
  58. > > which was significantly harder for me, to read the binary characters.
  59. > >
  60. > > In Icon's defense, I notice that when I TYPE the above-mentioned 2nd
  61. > > file, I only see the characters occurring prior to the ^Z.  And I do not
  62. > > want it to appear that I am questioning Icon's usefulness.  It is
  63. > > normally one of the 1st languages I choose for utilities of this type.
  64. > >
  65. > > Comments?
  66. > >
  67. > >
  68. > > Steve Graham
  69. > >
  70. > > ===
  71. > >
  72. > > Steve Graham wrote:
  73. > > >
  74. > > > Hello.
  75. > > >
  76. > > > I am using MS-DOS Icon 9.1 to read a binary file.  After reading 6
  77. > > > characters, the program apparently quits reading.  I have attached the
  78. > > > relevant portion of the code:
  79. > > >
  80. > > > -------------------------- Code ------------------------------
  81. > > > procedure main(args)
  82. > > > #
  83. > > >   cnt := 0
  84. > > >   in  := open(args[1],"r") | stop("Unable to open ",args[1])
  85. > > >   out := open(args[2],"w") | stop("Unable to open ",args[2])
  86. > > >   while character := reads(in,1) do {
  87. > > >      write(character," -->", ord(character))
  88. > > >      cnt := cnt+1
  89. > > >     }
  90. > > >   close(in,out)
  91. > > >   write(cnt," characters transferred")
  92. > > > end
  93. > > > -----------------------End of Code-------------------------
  94. > > >
  95. > > > I invoke the program with:
  96. > > >
  97. > > > word r99-0059.doc r99-0059.txt
  98. > > >
  99. > > > I get output of (some unprintable characters are represent by _):
  100. > > >
  101. > > > - -->208
  102. > > > - -->207
  103. > > >  -->17
  104. > > > _ -->224
  105. > > > ∩┐╜ -->161
  106. > > > _ -->177
  107. > > > 6 characters transferred
  108. > > >
  109. > > > Any ideas?
  110. > > >
  111. > > > Thanks in advance.
  112. > > >
  113. > > > -- Steve
  114. > > >
  115. > > > ______________________________________________________
  116. > > >
  117. > > > Steve Graham
  118. > > > Laboratory Corporation of America (LabCorp)
  119. > > > 12160 Abrams Road, Suite 601
  120. > > > Dallas, Texas 75243
  121. > > >
  122. > > > E-mail: graham@cowboy.biomed.com
  123. > > > Phone:  972.643.6124  (direct to desk)
  124. > > >         972.437.5255 ext 5224
  125. > > > FAX:    972.454.1040
  126. > > > _______________________________________________________
  127. > >
  128. > 
  129. > --
  130. > Alan B. Saichek                                         abs@engr.sgi.com
  131. > Member Technical Staff - QA Team Lead                   (650) 933-2507
  132. > Advanced Entertainment Systems, Video Compute R&D       07L-808
  133.  
  134. -- 
  135.  
  136.  
  137. ______________________________________________________
  138.  
  139. Steve Graham
  140. Laboratory Corporation of America (LabCorp)                
  141. 12160 Abrams Road, Suite 601
  142. Dallas, Texas 75243
  143.  
  144. E-mail: graham@cowboy.biomed.com
  145. Phone:  972.643.6124  (direct to desk)
  146.         972.437.5255 ext 5224
  147. FAX:    972.454.1040
  148. _______________________________________________________
  149.